Wear-Slot-Valence names an undocumented function, with lambda list (INSTANCE).
Defined in file src/db/friendly.lisp.
(SETF Wear-Slot-Valence) names an undocumented function, with lambda list (VALUE INSTANCE).